www.gusucode.com > 网域标准通用企业自助建站系统正式版 2009 > 网域标准通用企业自助建站系统正式版 2009.18/网域公司企业网站管理系统ACCESS和SQL正式版/网域公司企业网站管理系统SQL正式版/admin/Admin_FeedbackRe.asp
<!--#include file="conn.asp"--> <!--#include file="admin.asp"--> <!--#include file="inc/articlechar.inc"--> <%if Request.QueryString("mark")="southidc" then id=request("id") if request.form("html")="on" then ReFeedback=request.form("ReFeedback") else ReFeedback=htmlencode2(request.form("ReFeedback")) end if Set rs = Server.CreateObject("ADODB.Recordset") sql="select * from Feedback where id="&id rs.open sql,conn,1,3 rs("ReFeedback")=ReFeedback rs("ReTime")=date() rs.update rs.close response.redirect "Admin_Feedback.asp" end if id=request.querystring("id") Set rs = Server.CreateObject("ADODB.Recordset") rs.Open "Select * From Feedback where id="&id, conn,1,1 %> <!-- #include file="Inc/Head.asp" --> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <form method="post" action="Admin_FeedbackRe.asp?mark=southidc"> <input type=hidden name=id value=<%=id%>> <td align="center" valign="top"> <br> <br> <table width="560" border="0" cellpadding="2" cellspacing="1" class="table_southidc"> <tr> <td height="25" class="back_southidc"> <div align="center"><strong>回复留言 <br> </strong></div></td> </tr> <tr> <td><div align="center"> <table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000"> <tr bgcolor="#ECF5FF"> <td height="25" colspan="2"> <div align="center"></div> 你正准备回复<b><%=rs("UserName")%></b>的留言,他的留言是:</td> </tr> <tr bgcolor="#ECF5FF"> <td width="18%" height="22"> <div align="center">主 题</div></td> <td width="82%" bgcolor="#ECF5FF"> <%=rs("title")%></td> </tr> <tr bgcolor="#ECF5FF"> <td height="25"> <div align="center">内 容</div></td> <td height="25"> <%=rs("content")%></td> </tr> </table> </div></td> </tr> </table> <br> <br> <table width="560" border="0" cellpadding="2" cellspacing="1" class="table_southidc"> <tr> <td class="back_southidc" height="25"> <div align="center"><strong>输入回复内容</strong></div></td> </tr> <tr> <td bgcolor="#ECF5FF"> <div align="center"> <textarea name="ReFeedback" cols="70" rows="10"><%=rs("ReFeedback")%></textarea> </div></td> </tr> <tr> <td bgcolor="#ECF5FF"> <div align="center">是否支持Html <input type="checkbox" name="html" value="on"> <input type="submit" value="确定"> <input type="reset" value="从来"> </div></td> </tr> </table></td> </form> </tr> </table> <!-- #include file="Inc/Foot.asp" -->